clear
use "Table_A12_Figure_A9.dta"

estpost ttest nat_int eu_funds out_eu   antigov  diff_eu_sk, by(high_interest)
esttab, wide nonumber cell("b N_1 N_2 z p") mtitle("diff.")
 
*****

graph bar (mean) nat_int eu_funds out_eu   antigov  diff_eu_sk , ytitle("Support for each item from 1 (not at all) to 7 (very high)")  graphregion(color(white))   over(high_interest) over(country) 
 
